; * lisp/mouse.el: Fix typos in previous change

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 4dcc2f28f4a6d37d0a16da1f3fc345e243365475..3441a4787e61d41e697a84aa43763632106b2f3a 100644 (file)
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -455,9 +455,9 @@ CLICK-SYM and DOWN-SYM are the mouse click and down key symbols to use."
           context-menu--saved-bindings)
     (global-set-key down context-menu-entry)))
 
-(defun context-menu--reset-bindings ()
+(defun context-menu--restore-bindings ()
   "Restore saved `context-menu-mode' bindings."
-  (pcase-dolist (`(sym . binding) context-menu--saved-bindings)
+  (pcase-dolist (`(,sym . ,binding) context-menu--saved-bindings)
     (let ((key (vector sym)))
       (if binding
           (global-set-key key binding)